** Exploring the min wage data
** JHL 

*************************************
** Set up workspace
*************************************
version 14.0
clear all
set more off

cd "${path_home}"
adopath + ../programs

** log using "${path_log}/a05_mw", text replace

*************************************
** Start work here 
*************************************
timer on 1 

*************************************
** [1] Plot state panel of minimum wages across year-month using VZ daily, monthly modes 
*************************************

use "${path_big_dta}/mw/VZ/VZ_state_stata/VZ_state_daily", clear 

gen year = year(date)
gen month = month(date)
gen ym = ym(year,month)
format ym %tm
keep if year >= 2006 

bys statefips year month: egen mode_mw = mode(mw)
duplicates drop statefips year month, force

** Alternative 
xtline mode_mw if year >= 2006 & year <= 2015, i(statefips) t(ym) overlay legend(off) ytitle(Minimum wage by state ($)) xtitle(Month) ///
graphregion(color(white)) xlabel(#10, labsize(small))

** To Paper
translate @Graph "${path_out}/graphs/mw_monthly_state_0615.pdf", name("Graph") replace

** Black and white
** Alternative 
xtline mode_mw if year >= 2006 & year <= 2015, i(statefips) t(ym) overlay legend(off) ytitle(Minimum wage by state ($)) xtitle(Month) ///
graphregion(color(white)) xlabel(#10, labsize(small)) scheme(plotplain) 

** To Paper
translate @Graph "${path_out}/graphs/mw_monthly_state_0615.pdf", name("Graph") replace


*************************************
** Close workspace
*************************************
timer off 1
timer list 1
** log close 